Type TWall
	Field mesh 
	Field PosX#,PosY#,PosZ# ; position in 3d-space 	
	Field SizeX#,SizeY#,SizeZ# ; Size in 3d-space
	Field ScaleX#,ScaleY#,ScaleZ# 
End Type 



Function TWall_CreateWall.TWall(p_MinX#=-1.0, p_MinY#=-1.0, p_MinZ#=-1.0, p_MaxX#=1.0, p_MaxY#=1.0, p_MaxZ#=1.0, p_PosX#, p_PosY#, p_PosZ#)
	Local l_w.TWall = New TWall
	
	l_w\mesh = CreateBox(p_MinX#, p_MinY#, p_MinZ#, p_MaxX#, p_MaxY#, p_MaxZ# )
	Cel_Shade( l_w\mesh,0.1)

	EntityType l_w\mesh, kWALL_COL

    ; calculate the entitybox for collision
    Auto_EntityBox( l_w\mesh )

    PositionEntity l_w\mesh,p_PosX#, p_PosY#, p_PosZ#
	l_w\PosX# = p_PosX#
	l_w\PosY# = p_PosY#
	l_w\PosZ# = p_PosZ#
	
	EntityShininess  l_w\mesh,1


	;return it
	Return l_w
	
End Function 
;~IDEal Editor Parameters:
;~C#Blitz3D